home *** CD-ROM | disk | FTP | other *** search
/ The X-Philes (2nd Revision) / The X-Philes Number 1 (1995).iso / xphiles / hp48hor1 / coder.rpl < prev    next >
Text File  |  1991-09-21  |  414b  |  26 lines

  1. %%HP:T(1);
  2. @ CODER by Simone Rapisarda & James Cloos
  3. "D9D20  @ ::
  4.  D8A81  @ CK2NOLASTWD
  5.  88041  @ DO>STR
  6.  32230  @ SWAP
  7.  88041  @ DO>STR
  8.  BB726  @ DUPLEN$
  9.  59230  @ ROT
  10.  2A170  @ BEGIN
  11.  CA130  @ 2DUP
  12.  63650  @ LEN$
  13.  38D30  @ #>
  14.  EE170  @ WHILE
  15.  D9D20  @  ::
  16.  88130  @  DUP
  17.  3915D  @  &$
  18.  B2130  @  ;
  19.  5E170  @ REPEAT
  20.  9FF30  @ ONE
  21.  59230  @ ROT
  22.  33750  @ SUB$
  23.  B9881  @ XOR$
  24.  B2130  @ ;
  25. "
  26.